<%
Dim http: Set http = Server.CreateObject("MSXML2.ServerXMLHTTP")

'https://issues.onehippo.com/secure/useravatar?ownerId=rdewijngaert&amp;avatarId=13362&amp;s=48

url = request("url")

Response.ExpiresAbsolute=DateAdd("D", 1, Now()) ' cache het plaatje 1 dagen
response.buffer = true
	
http.open "GET", url, False, "", ""
http.setRequestHeader "Authorization", "Basic " & application("Jira_Key") 'Base64Encode("username:password")
http.send

Response.BinaryWrite http.ResponseBody

set http = nothing
%>